﻿Public Class main

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Icon = My.Resources.logov1ico()
    End Sub


    'RichTextBox1.AppendText(Environment.NewLine)

    Private Sub ButtonX3_Click(sender As Object, e As EventArgs)
        'MsgBox("This project is created by Ukachar from Lonsoft Corporation! Its open source without reason, I mean, I coded it to help people to make their .htaccess, robots.txt... files from their local computer, not from an internet site!", MsgBoxStyle.Information)
        about.Show()

    End Sub

    Private Sub PictureBox1_Click(sender As Object, e As EventArgs) Handles PictureBox1.Click
        Process.Start("http://lonsoftcorporation.co.nf/projects/webtool/index.html")
    End Sub

    Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        Process.Start("http://lonsoftcorporation.co.nf/projects/webtool/index.html")
    End Sub

    Private Sub CloudButton1_Click(sender As Object, e As EventArgs) Handles CloudButton1.Click
        htaccess.Show()
        Me.Hide()
    End Sub

    Private Sub ButtonX2_Click(sender As Object, e As EventArgs)

    End Sub

    Private Sub CloudButton3_Click(sender As Object, e As EventArgs) Handles CloudButton3.Click
        'MsgBox("This project is created by Ukachar from Lonsoft Corporation! Its open source without reason, I mean, I coded it to help people to make their .htaccess, robots.txt... files from their local computer, not from an internet site!", MsgBoxStyle.Information)
        about.Show()
    End Sub
End Class
